/*
 * Copyright (C) 2008-2010 TrinityCore <http://www.trinitycore.org/>
 * Copyright (C) 2006-2009 ScriptDev2 <https://scriptdev2.svn.sourceforge.net/>
 *
 * This program is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License as published by the
 * Free Software Foundation; either version 2 of the License, or (at your
 * option) any later version.
 *
 * This program is distributed in the hope that it will be useful, but WITHOUT
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
 * more details.
 *
 * You should have received a copy of the GNU General Public License along
 * with this program. If not, see <http://www.gnu.org/licenses/>.
 */

/* ScriptData
 SDName: Stratholme
 SD%Complete: 100
 SDComment: Misc mobs for instance. pGo-script to apply aura and start event for quest 8945
 SDCategory: Stratholme
 EndScriptData */

/* ContentData
 go_gauntlet_gate
 mob_freed_soul
 mob_restless_soul
 mobs_spectral_ghostly_citizen
 EndContentData */

#include "ScriptPCH.h"
#include "stratholme.h"
#include "Group.h"

/*######
 ## go_gauntlet_gate (this is the _first_ of the gauntlet gates, two exist)
 ######*/

class go_gauntlet_gate: public GameObjectScript {
public:
    go_gauntlet_gate() :
            GameObjectScript("go_gauntlet_gate") {
    }

    bool OnGossipHello(Player* pPlayer, GameObject* pGo) {
        InstanceScript* pInstance = pGo->GetInstanceScript();

        if (!pInstance)
            return false;

        if (pInstance->GetData(TYPE_BARON_RUN) != NOT_STARTED)
            return false;

        if (Group *pGroup = pPlayer->GetGroup()) {
            for (GroupReference *itr = pGroup->GetFirstMember(); itr != NULL;
                    itr = itr->next()) {
                Player* pGroupie = itr->getSource();
                if (!pGroupie)
                    continue;

                if (pGroupie->GetQuestStatus(QUEST_DEAD_MAN_PLEA)
                        == QUEST_STATUS_INCOMPLETE
                        && !pGroupie->HasAura(SPELL_BARON_ULTIMATUM)
                        && pGroupie->GetMap() == pGo->GetMap())
                    pGroupie->CastSpell(pGroupie, SPELL_BARON_ULTIMATUM, true);
            }
        } else if (pPlayer->GetQuestStatus(QUEST_DEAD_MAN_PLEA)
                == QUEST_STATUS_INCOMPLETE
                && !pPlayer->HasAura(SPELL_BARON_ULTIMATUM)
                && pPlayer->GetMap() == pGo->GetMap())
            pPlayer->CastSpell(pPlayer, SPELL_BARON_ULTIMATUM, true);

        pInstance->SetData(TYPE_BARON_RUN, IN_PROGRESS);
        return false;
    }
};

/*######
 ## mob_freed_soul
 ######*/

//Possibly more of these quotes around.
#define SAY_ZAPPED0 -1329000
#define SAY_ZAPPED1 -1329001
#define SAY_ZAPPED2 -1329002
#define SAY_ZAPPED3 -1329003

class mob_freed_soul: public CreatureScript {
public:
    mob_freed_soul() :
            CreatureScript("mob_freed_soul") {
    }

    CreatureAI* GetAI(Creature* pCreature) const {
        return new mob_freed_soulAI(pCreature);
    }

    struct mob_freed_soulAI: public ScriptedAI {
        mob_freed_soulAI(Creature *c) :
                ScriptedAI(c) {
        }

        void Reset() {
            DoScriptText(
                    RAND(SAY_ZAPPED0, SAY_ZAPPED1, SAY_ZAPPED2, SAY_ZAPPED3),
                    me);
        }

        void EnterCombat(Unit* /*who*/) {
        }
    };
};

/*######
 ## mob_restless_soul
 ######*/

#define SPELL_EGAN_BLASTER  17368
#define SPELL_SOUL_FREED    17370
#define QUEST_RESTLESS_SOUL 5282
#define ENTRY_RESTLESS      11122
#define ENTRY_FREED         11136

class mob_restless_soul: public CreatureScript {
public:
    mob_restless_soul() :
            CreatureScript("mob_restless_soul") {
    }

    CreatureAI* GetAI(Creature* pCreature) const {
        return new mob_restless_soulAI(pCreature);
    }

    struct mob_restless_soulAI: public ScriptedAI {
        mob_restless_soulAI(Creature *c) :
                ScriptedAI(c) {
        }

        uint64 Tagger;
        uint32 Die_Timer;
        bool Tagged;

        void Reset() {
            Tagger = 0;
            Die_Timer = 5000;
            Tagged = false;
        }

        void EnterCombat(Unit* /*who*/) {
        }

        void SpellHit(Unit *caster, const SpellEntry *spell) {
            if (caster->GetTypeId() == TYPEID_PLAYER) {
                if (!Tagged && spell->Id == SPELL_EGAN_BLASTER
                        && CAST_PLR(caster)->GetQuestStatus(QUEST_RESTLESS_SOUL)
                                == QUEST_STATUS_INCOMPLETE) {
                    Tagged = true;
                    Tagger = caster->GetGUID();
                }
            }
        }

        void JustSummoned(Creature *summoned) {
            summoned->CastSpell(summoned, SPELL_SOUL_FREED, false);
        }

        void JustDied(Unit* /*Killer*/) {
            if (Tagged)
                me->SummonCreature(ENTRY_FREED, me->GetPositionX(),
                        me->GetPositionY(), me->GetPositionZ(),
                        me->GetOrientation(), TEMPSUMMON_TIMED_DESPAWN, 300000);
        }

        void UpdateAI(const uint32 diff) {
            if (Tagged) {
                if (Die_Timer <= diff) {
                    if (Unit* pTemp = Unit::GetUnit(*me, Tagger)) {
                        CAST_PLR(pTemp)->KilledMonsterCredit(ENTRY_RESTLESS,
                                me->GetGUID());
                        me->Kill(me);
                    }
                } else
                    Die_Timer -= diff;
            }
        }
    };
};

/*######
 ## mobs_spectral_ghostly_citizen
 ######*/

enum eGhostlyCitizenSpells {
    SPELL_HAUNTING_PHANTOM = 16336, SPELL_SLAP = 6754
};

class mobs_spectral_ghostly_citizen: public CreatureScript {
public:
    mobs_spectral_ghostly_citizen() :
            CreatureScript("mobs_spectral_ghostly_citizen") {
    }

    CreatureAI* GetAI(Creature* pCreature) const {
        return new mobs_spectral_ghostly_citizenAI(pCreature);
    }

    struct mobs_spectral_ghostly_citizenAI: public ScriptedAI {
        mobs_spectral_ghostly_citizenAI(Creature *c) :
                ScriptedAI(c) {
        }

        uint32 Die_Timer;
        bool Tagged;

        void Reset() {
            Die_Timer = 5000;
            Tagged = false;
        }

        void EnterCombat(Unit* /*who*/) {
        }

        void SpellHit(Unit * /*caster*/, const SpellEntry *spell) {
            if (!Tagged && spell->Id == SPELL_EGAN_BLASTER)
                Tagged = true;
        }

        void JustDied(Unit* /*Killer*/) {
            if (Tagged) {
                for (uint32 i = 1; i <= 4; ++i) {
                    //100%, 50%, 33%, 25% chance to spawn
                    if (urand(1, i) == 1)
                        DoSummon(ENTRY_RESTLESS, me, 20.0f, 600000);
                }
            }
        }

        void UpdateAI(const uint32 diff) {
            if (Tagged) {
                if (Die_Timer <= diff)
                    me->Kill(me);
                else
                    Die_Timer -= diff;
            }

            if (!UpdateVictim())
                return;

            DoMeleeAttackIfReady();
        }

        void ReceiveEmote(Player* pPlayer, uint32 emote) {
            switch (emote) {
            case TEXTEMOTE_DANCE:
                EnterEvadeMode();
                break;
            case TEXTEMOTE_RUDE:
                if (me->IsWithinDistInMap(pPlayer, 5))
                    DoCast(pPlayer, SPELL_SLAP, false);
                else
                    me->HandleEmoteCommand(EMOTE_ONESHOT_RUDE);
                break;
            case TEXTEMOTE_WAVE:
                me->HandleEmoteCommand(EMOTE_ONESHOT_WAVE);
                break;
            case TEXTEMOTE_BOW:
                me->HandleEmoteCommand(EMOTE_ONESHOT_BOW);
                break;
            case TEXTEMOTE_KISS:
                me->HandleEmoteCommand(EMOTE_ONESHOT_FLEX);
                break;
            }
        }
    };
};

void AddSC_stratholme() {
    new go_gauntlet_gate();
    new mob_freed_soul();
    new mob_restless_soul();
    new mobs_spectral_ghostly_citizen();
}
